MODULE atominfo 
! Copyright (C) 2010 W. Wang 
! License: This file is distributed under the terms of the GNU General Public License.
! Description: ! The standard information of each atom.
! Revision histoty: Created May 2010  
! Input/output Parameters: 

IMPLICIT NONE

TYPE :: atom_info

CHARACTER(2) :: atom_symbol
INTEGER :: atom_num
REAL(8) :: atom_mass
REAl(8):: atom_pos(3)
REAL(8) :: atom_radius
CHARACTER(10) :: atom_pot
REAL(8):: atom_magmom=0

END TYPE atom_info

END MODULE
